home *** CD-ROM | disk | FTP | other *** search
/ Solar System Explorer / Solar System Explorer.iso / Start.exe / Start.dcr / Internal_2_PREPARE with reset.ls < prev    next >
Encoding:
Text File  |  2010-08-18  |  523 b   |  22 lines
  1. on prepareMovie
  2.   clearGlobals()
  3.   repeat with j = 1 to the number of castLibs
  4.     repeat with i = 1 to the number of castMembers of castLib j
  5.       if member(i, j).type = #shockwave3d then
  6.         member(i, j).resetWorld()
  7.         member(i, j).revertToWorldDefaults()
  8.       end if
  9.     end repeat
  10.   end repeat
  11.   randomSeed = the milliSeconds
  12. end
  13.  
  14. on stopMovie
  15.   global newTextureList
  16.   if newTextureList <> VOID then
  17.     repeat with n = 1 to newTextureList.count
  18.       newTextureList[n].erase()
  19.     end repeat
  20.   end if
  21. end
  22.